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Pág. 26 - legenda à esquerda 
Onde se lê: No TK-80X o Caleidoscópio 
Leia-se: No TK-90X, o Caleidoscópio 


Pág. 34 - 1º col. - 4º parágr. 
Onde se lê: 5 + 10 + 200 + 3000 
Leia-se: 5 + 70 + 200 + 3000 


Pág. 53 - 1º col. - 2º parágr. 
Onde se lê: um conector DID 
Leia-se: um conector DIN 


Pág. 56 - título da matéria 
Onde se lê: ARITIMÉTICA 
Leia-se: ARITMÉTICA 


Pág. 60 - 3º col. - quadro 

Onde se lê: O octal tem 8 dígitos: 0, 1, 
L 4, 5.6, Te 8: 

Leia-se: O octal tem 8 dígitos: 0, 1, 2, 
34 35,607. 


Pág. 87 - intertítulo - faixa preta 
EFEITOS DOS BLOCOS GRÁFICOS 


Pág. 245 - 1º col. - 1º e 4º parágr. 
Onde se lê: VAL(= AS) e VAL(= B$) 
Leia-se: VAL(AS) e VAL(B$) 


Pág. 245 - 1º col. - 4º parágr. 
Onde se lê: B$''45 MARCOS” 
Leia-se: B$=''45 MARCOS” 


Pág. 260 - 1º col. - 5º, 6º, 7º parágr. 
Pág. 260 - 2º col. - 2º parágr. 

Onde se lê: CHRS 

Leia-se: CHRS 


Pág. 290 - 1º col. - último parágr. 
Pág. 291 - 2º col. - último parágr. 
Onde se lê: comandos GETS 
Leia-se: comandos GET 


Pág. 294 - 1º col. - 2º parágr. 
Onde se lê: poderão ser chocados 
Leia-se: poderão ser checados 


Pág. 301 - 3º col. - 1º parágr. 
Onde se lê: A for menor que o de B 
Leia-se: A for menor ou igual ao de B 


Pág. 327 - 2º col. - 6º parágr. 
Onde se lê: COSUB 
Leia-se: GOSUB 


Pág. 364 - 1º col. - 2º parágr. 
Onde se lê: comandos de remuneração 
Leia-se; comandos de renumeração 


Pág. 366 - 2º col. - 2º parágr. 
Onde se lê: trará 65, o código de B. 
Leia-se: trará 66, o código de B. 


Pág. 398 - 2º col. - 7º parágr. 
| Onde se lê: SIS 
Leia-se: S$ 


- — re , e 


Pág. 398 - 3º col. - 11º parágr. 
Onde se lê; SIS() 
Leia-se; SS) 


Pág. 444 - quadro - 2º parágr. 

Onde se lê; Os micros das linhas 
TRS-80, TRS-Color, Apple, TK-2000 
e MSX, 

Leia-se: Os micros das linhas TRS-80, 
Apple, TK-2000 e MSX, 


Pág. 501 - 1º col. - 3º parágr. 

Onde se lê: mensagens do tipo “Você 
tem um canhão disponível”. 

Leia-se: mensagens do tipo “VOCE 
TEM | CANHÕES DISPONIVEIS”. 


Pág. 561. - 2º col. - 5º parágr. 
Onde se lê: sistemas telemétricos, 
Leia-se: sistemas telemáticos, 


Pág. 564 - 2º col. - 2º parágr. 
Onde se lê: sistemas telemétricos 
Leia-se: sistemas telemáticos 


Pág. 584 - 2º col. - 2º parágr. 
Onde se lê: linhas 5000 e 5180 
Leia-se: linhas 5000 e 5130 


Pág. 609 - 1º col. - 1º parágr. 

Onde se lê: Alguns computadores (Apple, 
TK-2000, MSX e TRS-80) permitem 
dois ou mais parâmetros, enquanto 
outros (TRS-Color), apenas um. 

Leia-se: Alguns computadores (Spectrum, 
MSX e TRS-80) permitem dois ou 
mais parâmetros, enquanto outros 
(Apple, TK-2000 e TRS-Color), ape- 
nas um. 


Pág. 610 - 1º col. - 1º parágr. 
Onde se lê: XxX x X 
Leia-se: X «x X « X 


Pág. 634 - 1º col. - 3º parágr. 

Onde se lê: Devido à falta de comandos 
gráficos adequados no ZX-81, não 
apresentamos programas para essa 
máquina, 

Leia-se: Devido à falta de comandos 
gráficos adequados no ZX-81 e no 
TRS-80, não apresentamos progra- 
mas para essas máquinas. 


Pág. 748 - 1º col. - 2º parágr. 
Onde se lê: Keytone Kappers 
Leia-se: Keystone Kappers 


Pág. 852 - nomenclatura no esquema 
de blocos 

Onde se lê; Detector de visão 

Leia-se: Detector de video 


Pág. 906 - 2º col. - 2º parágr. 
Onde se lê: concectar 
Leia-se: conectar 





Pág. 908 - 1º col, - 2º parágr. 
Onde se lê: Sinclari 
Leia-se: Sinclair 


Pág. 924 - 2º col. - último parágr. 
Onde se lê: TR-Color 
Leia-se: TRS-Color 


Pág. 932 - 3º col. - 2º parágr. 
Onde se lê: LET A=VAL“100” 
Leia-se; LET A=VAL('*100") 


Pág. 1014 - 1º col. - 1º parágr. 
Onde se lê: artigo da página 816. 
Leia-se: artigo da página 794. 


Pág. 1124 - 2º col. - 3º parágr. 
Onde se lê: John von Newman 
Leia-se: John von Neumann 


Pág. 1180 - 1º col. - fig. 
Onde se lê; Waiting time (secs) 
Leia-se: Tempo decorrido (segundos) 


Pág. 1260 - 1º col. - 4º parágr. 
Onde se lê: <SCAPE> 
Leia-se: <ESCAPE > 


Pág. 1311 - 3º col. - 1º parágr. 
Onde se lê: saftware 
Leia-se: software 


Pág. 1320 - quadro 
Onde se lê: FORWARD D: 
Leia-se: FORWARD :D 


Pág. 1329 - 3º col. - 1º parágr. 
Onde se lê <CIRL><C> 
Leia-se: <CTRL> <C> 


Pág. 1349 - 3º col. - 6º parágr. 
Onde se lê: alistamento 
Leia-se: alisamento 


Pág. 1383 - 3º col. - 2º parágr. 
Pág. 1384 - 3º col. - 1º parágr. 
Pág. 1385 - 2º col. - 2º parágr. 
Onde se lê: WYSWYG 

Leia-se: WYSIWYG 


Pág. 1383 - 3º col. - 2º parágr. 

Onde se lê: (do inglês What You See 
What You Get) 

Leia-se: (do inglês What You See Is 
What You Get) 


Pág. 7- 2º col, - 2º parágr. 
Onde se lê: (só vale para o TK-90X): 
Leia-se: (vale para toda a linha Sinclair): 


Pág. 30 - 1º col. - progr. 
Na linha 60, substitua a flecha para 
cima pela letra 1. 











- Pág. 32 - 3º col, - progr. 
Na linha 150, substitua a flecha para 
cima pela letra 1. 


Pág. 39 - 1º col. - progr. 

Para funcionar no ZX-81, coloque tu- 
do em maiúsculas e troque a linha 130; 
130 PRINT,,, “OUTRO NUMERO (S/N)? 


Pág. 41 - 1º col. - progr. 

Para funcionar no ZX-81, coloque 
tudo em maiúsculas e faça as seguin- 
tes alterações no programa: 

25 LET T=0 

26 LEBT €=0 

40 IF N= —99 THEN GOTO 80 
80 PRINT “MEDIA = "";T/C 

90 STOP 


Pág. 42 - 2º col. - progr. 

Para funcionar no ZX-81, coloque 
tudo em maiúsculas e faça as seguintes 
alterações no programa: 

50 IF G=N THEN GOTO 90 
90 PRINT “MUITO BEM” 
92 PAUSE 100 

94 GOTO 10 


Pág. 43 - 1º col. - 2º progr. 

Para funcionar no ZX-81!, mude tu- 
do para maiúsculas e separe as instru- 
ções da linha HO em duas linhas: 

HO LET A$= INKEYS 
115 IF A$< >º“S” AND A$< >'N” 
THEN GOTO M10 


Pág. 77 - 1º col. - 2º progr. 
Para funcionar no ZX-81!, divida a li- 
nha 15 em: 
15 INPUT A 
16 INPUT B 


Pág. 78 - 2º col. - progr. 

Para funcionar no ZX-81, forme no- 
vas linhas com os comandos separados 
por dois pontos (GOTO 170) nas linhas 
130, 140 e 150. 


Pág. 94 - 2º col. - 4º parágr. 

Onde se lê: No ZX-81 a tecla RAMD 
fornece RAND na tela). 

Leia-se: No ZX-81 a tecla RAND pode 
ser usada para essa finalidade). 


Pág. 244 - 2º col, - 1º progr. 

O programa também funciona para 
o ZX-81!. Apenas coloque o GOTO 10 
da linha 30 em uma linha separada. 


Pág. 245 - 2º col. - progr. 
O programa também funciona para 
o ZX-81. 


Pág. 334 - 3º col. - progr. 
O logotipo não se aplica a este 
programa, 


Pág. 1214 - 2º col. 
Onde se lê: XMLEN X$-N TO+1) 
Leia-se: XS(LEN X$8-N TO) 


Pág. 30 - 1º col. - progr. 
Na linha 60, substitua a flecha para 
cima pela letra 1. 


Pág. 32 - 3º col, - progr. 
Na linha 150, substitua a flecha para 
cima pela letra 1. 


Pág. 46 - 1º col. - progr. 
Acrescente a linha 90; 
90 DIM a$(32) 


Pág. 94 - 1º col. - 3º progr. 
Pág. 100 - 1º col. - 3º progr. 

O logotipo não se aplica a este 
programa. 


Pág. 136 - 3? col. - progr. 

Corrija a linha 200: 
200 CLS:PRINT BRIGHT v;PAPER 2; 
INK 6; AT 2,4;*MENU PRINCIPAL” 


Pág. 169 - 1º col. - 2º parágr. 

Acrescente: 

No micro nacional TK-90X, o co- 
mando BEEP recebeu o nome de 
SOUND. Portanto, se você tem um 
TK-90X, substitua todas as ocorrências 
do comando BEEP pelo comando 
SOUND nas linhas 8010 (programas da 
página 169, 1º e 3º colunas), 8010 e 8015 
(programa da página 170, 1º coluna) e 
400 (página 170, 2º coluna). 


Pág. 213 - 3º col. - 1º parágr. 

Onde se lê: Os comandos Id de, 16384 
e ld hi, 1,16385 

Leia-se: Os comandos ld de, 16384 e Id 
hl, 16385 


Pág. 248 - 2º col. - progr. 

Na 4º linha da tinha 5120, 
onde se lê; “ld'',64,6, 
leia-se: “ld'',64,22, 


Pág. 251 - 1º col. - progr. 
Acrescente ao final da linha 6110: 
'GOSUB 6160 
Na tinha 6150, 
onde se lê: GOSUB 6260 
feia-se: GOSUB 6160 


Pág. 251 - 2º col. - progr. 
Acrescente a linha: 
9999 STOP 


Pág. 278 - 2º col. - progr. 
Corrija a linha JO10: 
1010 PRINT AT 12,6;5$ 


Pág. 304 - 2º col. - progr. 
O logotipo não se aplica a este 
programa. 


Pág. 309 - 1º col. - 2º progr. 

Corrija as linhas 140 e 145: 
140 DATA “NADAR”, SSESVAZIAR”,6, 
“ACENDER”,7, “DESISTIR”,8,LIS 
TAR”,9,ºMATAR”,10,ºATIRAR”, 
10,*AJUDAR",I1 
145 DATA “PEGAR”,2/APANHAR”, 
2, “CARREGAR",2,ºCOLOCAR”, 
3,'DEIXAR",3,'LARGAR”',3,'PU 
XAR",4 


Pág. 309 - 2º col. - progr. 
Acrescente a linha 515: 
515 GOTO G(]) 


Pág. 366 - 2º col. - 1º progr. 
O logotipo não se aplica a este 
programa. 


Pág. 640 - 2º col. - 4º parágr. 
Onde se lê; UNK 
Leia-se: INK 


Pág. 824 - 2º col. - progr. 
Corrija a linha 750: 
750 REM org 58155 


Pág. 825 - 3º col. - progr. 
Corrija a linha 40: 

40 DATA 83, 67, 79, 82, 69, 45, 48, 
48, 48, 48, 48, 48, 76, 73, 86, 69, 83, 
45, 53, 71, 65, 77, 69, 32, 79, 86, 69, 
EA SA, 33, 3) 33, 35, 3553, 55, 35 
6 AR e fa JR O jo E PB OD, 5 PRE À 
E de JB, E SR, e RR PRQ do RD, o RE a PR JR O 
553.39, 3o,do, da 


Pág. 867 - 3º col. - progr. 
Corrija a linha 100: 
100 GOSUB 2 
e, na linha 2, substitua GOTO 10 por 
GOTO 1 


Pág. 902 - 2º col. - progr. 

Corrija a linha 2720: 
2720 LET PF=0:IF 18='S” OR I$= 
“*s” THEN GOTO 2760 


Pág. 921 - 2º col. - progr. 
Corrija a linha 50: 
50 FOR M=1 TO N(N) 


Pág. 1042 - 2º col. - progr. 

Corrija a linha 2790; 
2190 DATA “cavaleiro”, “sargento 
" , “lanceiros"” , “lanceiros” , “arqu 
erros” , “arqueiros” , “camponeses” 
“camponeses” 


Pág. 1214 - 2º col. 
Onde se lê: XM(LEN X$-N TO+ 1) 
Leia-se: XS(LEN XS-—-N TO) 
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Pág. 6 - 3º col. - quadro 

Corriia a 2º linha de códigos 
numéricos: 
Onde se lê: 152 131 190 176 128 
Leia-se: 151 131 191 176 280 


Pág. 24 - 3º col. - progr. 

Para funcionar no TRS-80, substitua 
a linha 8 por: 
8 CLS 


Pág. 30 - 1º col. - 1º progr. 

Corrija a linha 40: 
40 IF K$=““F”' THEN M= 374 ELSE 
GOTO 30 


Pág. 31 - 2º col. - 4º parágr. 

Onde se lê: O programa para o TRS-80 
funciona de modo idêntico ao pro- 
grama para o TRS-Color. 

Leia-se: O programa para o TRS-80 
funciona de modo idêntico ao pro- 
grama para o TRS-Color. As teclas 
a serem pressionadas, porém, são L 
e R, que comandam, respectivamen- 
te, movimentos à esquerda e à direita. 


Pág. 33 - 3º col. - progr. 

Corrija a linha 150; 
- 150 IF P0O>1022 OR PO<O THEN 
PO=LP: GOTO 50 


Pág. 62 - 1º col. - progr. 
O logotipo não se aplica a este 
programa. 


Pág. 63 - 2º col. - 3º parágr. 

Onde se lê: programa para o TRS-80 e 
o TRS-Color, 

Leia-se: programa para o TRS-Color, 


Pág. 224 - 1º e 2º col. - progr. 

Acrescente (após o programa); 

O programa indicado funciona ape- 
nas no TRS-Color. Para executá-lo no 
TRS-80, faça as seguintes modificações: 
multiplique por dois todos os números 
depois dos comandos PRINTO, nas li- 
nhas 10, 20, 30, 60, 90 e 110; suprima 
as linhas 15 e 120, e inclua a linha: 
95 TIMER = TIMER+O0.I 


Pág. 270 a 275 

Todos os programas indicados para 
o TRS-Color também funcionam no 
TRS-80. 


Pág. 322 - 1º col. - 2º progr. 
O programa também pode ser execu- 
tado no TRS-80. 


Pág. 375 - 1º col. - progr. 
O logotipo não se aplica ao programa. 


Pág. 612 - 2? col. - progr. 
Acrescente a linha 35: 
35 PRINT FNT$S(I$) 


Pág. 652 - 1º col. - 2º parágr. 
Onde se lê; POST (- 2) 
Leia-se: POS (— 2) 


Pág. 702 - 3º col. - progr. 
O logotipo não se aplica ao programa. 


Pág. 932 - quadro - 11º parágr. 
Esta indicação também serve para o 
TRS-80. 


Pás. 
Pág. 
Pág. 
Pág. 
Pág. 
Páp. 
Pág. 
Pág. 


Pág. 1305 - 1º, 2º e 3º col. - progr. 
Os programas para o TRS-Color 
também funcionam no TRS-80. 


ns ES Deo, 


Pág. 19 - 2º col. - progr. 

Corrija a linha 430: 
430 RESTORE: FOR J=0 TO N- I:READ 
AS:PRINT & — P,STRINGS(LL — ML, "3; 
SP$;:PRINT & — P,MIDS(AS,2); 
CHR$(13); 


1122 - 1º col. - progr. 
1126 - 3º col. - progr. 
1127 - 2º col. - progr. 
1197 - 3º col. - progr. 
1179 - 2º e 3º col. - progr. 
MB80 - 3º col. - progr. 
1184 - 1º col. - progr. 
1303 - 1º col. - progr. 


Pág. 31- 2º col. - 3º parágr. 

Onde se lê; A linha 60 investiga se “L” 
foi pressionada... A linha 70 confe- 
re se “R” foi pressionada... 

Leia-se: A linha 60 investiga se “E” foi 
pressionada... A linha 70 confere se 
“D” foi pressionada... 


Pág. 45 - 1º col. - 5º parágr. 

Onde se lê: apenas os das linhas TRS-80 
e MSX 

Leia-se: apenas os das linhas TRS-80, 
TRS-Color e MSX 


Pág. 52 - 3º col. - quadro 
Onde se tê: se N for a locução da tela 
Leia-se: se N for a locação da tela 


Pág. 65 - 1º col. - progr. 

Corrija a linha 420 
420 LET K$= INKEYS:IF K$=** * 
THEN GOTO 420 


Pág. 90 - 3º col. - 4º parágr. 

Onde se lê: .. limitar a memória em 
$H3680... que se reserve memória 
só até $H3680... só poderá usar o 
CLEAR até $H1ES80, 


Leia-se: ..limitar a memória em 
&H3680... que se reserve memória só 
até &H3680... só poderá usar O 
CLEAR até &H1E80. 


Pág. 219 - 2º col. - 3º parágr. 

Onde se lê: PSHB armazena tempora- 
riamente na pilha 

Leia-se: PSHS armazena temporaria- 
mente na pilha 


Pág. 296 - 1º col, - progr. 

Corrija a linha 10: 
10 PCLEAR I:CLEAR 3000:CLS:PRIN 
TOZ3INICIALIZANDO”:R$=CHRS( 
13):POKE 146,1 


Pág. 297 - 2º col. - progr. 

Corrija a linha 100: 
100 DATA COM,115,3.CWAI,108,1,D 
AA,25,,/0RA,186,1,TST,125,3,LEAS, 
66,3,LEAU,67,3,LEAX,64,3,LEAY, 
65,3,MUL,61,,EORA,184,1,0RB,250,1 


Pág. 299 - 3º col. - progr. 

Corrija as linhas 1550 e 1560: 
1550 Pl= 1478:P0=P1:P2=0 
1560 PRINT (1448 — P2,KTAB(6)THK2): 
P9 = PO + LEN(T$(K2)) 
e acrescente a linha 1565: 
1565 IF LEN(TS(K2)) + P0> 1503 THEN 
P0=P0-32:P2=P2+32:Pl=Pl-32: 
GOTO 1565 


Pág. 300 - 1º col. - progr. 

Corrija a linha 1950: 
1950 IF X$< >''$” OR BD$<*0" OR 
BD$>''G'' THEN 1980 


Pág. 327 - 3º col. - 2º progr. 
Este programa também pode ser exe- 
cutado no TRS-Color. 


Pág. 495 - 1º col. - 6º parágr. 
Onde se lê: Após digiar € 
Leia-se: Após digitar € 


Pág. 535 - 3º col. - 6º parágr. 
Onde se lê; GEI 
Leia-se: GET 


Pág. 607 - 1º col. - progr. 
Na linha 2340, corrija IF ABS(OY) 
para IF ABS(PY) 


Pág. 656 - 1º col. - progr. 
Corrija as linhas 3040 e 3050: 
3040 e PEEK(342) = 247 THEN PT = 


Fr- 
3050 IF PEEK(343)=247 AND RL> 
— 30 THEN 


Pág. 703 - 3º col. - progr. 
Acrescente a linha 950: 

950 FOR DE=1 TO 3000:NEXT:RE 

TURN 
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- Pág. 760 - 3º col. - progr. 
Corrija a linha 9200: 
9200 DIM LE$(27) 


Pág. 829 - 2º? col. - progr. 
Corrija a linha 70: 
70 PSHS X 


Pág. 830 - 1º col. - progr. 
Corrija a linha 90: 
90 PULS B 


Pág. 932 - quadro - 11º parágr. 
Esta indicação também serve para o 
TRS-Color. 


Pág. 997 - 3º col. - progr. 
Corrija a linha 130: 
130 LDA &5 


Pág. 1040 - 2º col. - progr. 
Corrija a linha 1280: 
1280 IF NL>30 THEN NL =30 


Pág. 1044 - 2º col. - progr. 
Na linha 1420, onde se lê SR$(I), co- 
loque STR$(I) 


Pág. 1047 - 3º col. - pro 
Na linha 2490, onde se A SR$(D), co- 
loque STR$(I) 


Pág. 1075 - 2º col. - progr. 
Apague a linha 18 e acrescente a 180; 
180 GOSUB 2410:CLS:END 


Pág. 1118 - 2º col. - progr. 
Corrija a linha 10: 
10 ORG 19781 


Pág. 1236 - 1º col. - progr. 
Apague a linha 9870. 


Pág. 1236 - 3º col. - progr. 
Onde se lê: 9870 (linha) 
Leia-se: 980 


Pág. 1239 - 2º col. - progr. 
Substitua o sinal circunflexo entre as- 
pas “* “ por *“* nas linhas 550 e 580. 


Pág. 1239 - 3º col. - progr. 
Substitua, na linha 950, PRINT (0433 
por PRINTG432 


o Teia DEE 


Pág. 10 - 3º col. - 3º parágr. 

Troque de lugar as linhas: 
20 HTAB 18:VTAB 10:PRINT *'000” 
e 20 LOCATE 18,10:PRINT *'000” 


Pág. 16 - 1º col. - progr. 
Corrija a linha 140: 
140 GOTO 80 


Pág. 30 - 1º col. - progr. 
Corrija a linha 60: 
60 LOCATE 18,M:PRINT *““” 


Pág. 32 - 2º col. - 2º parágr. 
Onde se lê: a tecla CLEAR (código 26) 
Leia-se: a tecla <CLEAR> (código 27) 


Pág. 33 - 1º col. - 1º parágr. 
Onde se lê: teclas Ze X 
Leia-se: teclas com flechas 


Pág. 33 - 1º col. - 1º parágr. 
Acrescente: 
Nos micros da linha MSX, as teclas 
a serem utilizadas para deslocamento da 
base e disparo são, respectivamente, as 
flechas do cursor e da barra de espaços 
(correspondentes aos códigos 28, 29 e 32). 


Pág. 58 - 3º col. - progr. 

Corrija a linha 330: 
330 LOCATE 2+X+3,18:PRINT 
USING “&"N;: 


Pág. 73 - 1º col. - progr. 

Corrija as linhas 20 e 30: 
20 CLS:ICLEAR 10000:R$=“P RMCAI 
30 CLS:LOCATE 5,1:PRINT“M E NU 
PRINCIPAL 


Pág. 73 - 3º col. - progr. 

Corrija a linha 1130: 
1130 NEXT:R = INT(10000/(TS434A)) 
:PRINT:PRINT” Número máximo de 
registros — >":R 


Pág. 74 - 1º col. - progr. 
Corrija a linha 7070: 
7070 OPEN F$ FOR OUTPUT AS &1 


Pág. 84 - 2º col. - progr. 

Corrija a linha 3020: 
3020 IN$=INKEYS:IF IN$S=:**" 
THEN 3020 


Pág. 85 - 1º col. - progr. 

Corrija a linha 5070: 
5070 IF D>NR AND G6=1 THEN G=0:; 
CH=-—-1|1 ELSE IFD>NR THEN 5230 


Pág. 93 - 1º col. - progr. 
Corrija a linha 250: 
250 POKE SA,VAL(C&HO” + S$) 


Pág. 95 - 2º col. - 1º parágr. 

Onde se lê: o comando RUN: 

Leia-se: o comando RUN (defina antes 
a área onde está a rotina, digitando 
DEFUSR = &HE001): 


Pág. 95 - 2º col. - 2º parágr. 
Onde se lê: 

8HE001 

Leia-se: 

&HE001 





Pág. 107 - 2º col. - 6º parágr. 
Pág. 119 - 3º col. - 2º parágr. 

Acrescente: 

É possível desenhar letras e gráficos 
na mesma tela do MSX, porém usamos 
o comando DRAW neste programa, de 
modo a compatibilizá-lo com as versões 
para outros computadores. 


Pág. 120 - 3º col, - 9º parágr. 

Onde se lê: As cores disponíveis no 
PMODE 3,1 são: verde (1), amarelo 
(2), azul (3) e vermelho (4). 

Leia-se: As quatro primeiras cores dis- 
poniveis para o SCREEN gráfico no 
MSX são: preto (1), verde (2), verde- 
claro (3) e azul-escuro (4). 


Pág. 171 - 3º col. - progr. 
Acrescente estas linhas: 

135 FOR Z=1 TO 15 STEP .05: SOUND 8,Z 

137 NEXT;RETURN 

140 SOUND 1,0:FOR Z=0 TO T 

STEP .3 

145 SOUND A,Z:SOUND A,255-Z 

147 NEXT:RETURN 

150 FOR Z=0 TO 10 

154 FOR ZZ=0 TO T STEP 5 

156 SOUND 1,Z:SOUND A,ZZ 

157 NEXT ZZ,Z:RETURN 

160 FOR Z=1I5 TOT 

164 FOR ZZ=0 TO 15 

166 SOUND 1,Z:SOUND A,Z-ZZ 

167 NEXT ZZ,Z:RETURN 

170 IF T=255 THEN T=80 

171 SOUND 1,0:FOR Z=1 TO 40 

174 FOR ZZ= 10 TO RND (1D+T 

176 SOUND A,ZZ 

177 NEXT ZZ,Z:RETURN 

180 SOUND 1,1:IF T=255 THEN 

T=100 

184 FOR Z=10 TO T STEP 5 

186 FOR ZZ=5 TO Z 

187 SOUND A,Z-ZZ 

188 NEXT ZZ,Z:RETURN 

190 IF T=255 THEN T=16:A=1 

19] FOR ZZ=1 TO 30 

192 SOUND A,RND(1)+T 

195 FOR Z= 1 TO RND(1)+200 

197 NEXT Z,ZZ:RETURN 

200 IF T=255 THEN T=16:A=| 

201 FOR ZZ=1 TO 10 

202 SOUND A,RND(I)+T 

205 FOR Z= 1 TO RND(1)+16 STEP 8 

207 SOUND 8,2:NEXT Z,ZZ.RETURN 


Pág. 189 - 3º col, - 1º parágr. 
Onde se lê: SPRITE(0) AS 
Leia-se; SPRITE(D) = AS 


Pág. 262 - 1º col. - progr. 
Este programa funciona no MSX. 


Pág. 401 - 2º col. - progr. 
Acrescente a linha 5005: 
5005 DIM G(110) 








| 
= a = , 
] | 
| ] | 
| | | , | 
| 


Pág. 412 - 2º col. - 3º parágr. 

Onde se lê: O laço das linhas 70 a 90 co- 
loca nesse local 

Leia-se: O laço das linhas 60 a 90 colo- 
ca nesse local 


Pág. 429 - 1º col. - progr. 

Corrija a linha 2030: 
2030 DRAW “SIZBM” + STR$(CX+3) 
+" + STRKCY+2)+S$ 


Pág. 430 - 3º col. - 3º parágr. 
Onde se lê: A linha 60 dimensiona 
Leia-se: A linha 82 dimensiona 


Pág. 431 - 2º col. - 2º parágr. 
Onde se lê; das linhas 70 a 110 
Leia-se: das linhas 88 a 96 


Pág. 452 - 1º col. - progr. 
Acrescente a linha 6505: 
6505 CLOSE 1 


Pág. 464 - 1º col. - progr. 

Corrija a linha 800: 
800 A$= INKEYS:IF A$=''N” AND 
A$< >''S” THEN 800 


Pág. 553 - 3º col. 

Onde se lê; Linha 220: <SHIFT > 
<GRAPH> 

Leia-se: Linha 220: <SHIFT > 
<GRAPH>+ 


Pág. 579 - 2º col. - progr. 
Corrija a linha 10: 
10 CLS:KEYOFF 


Pág. 612 - 2º col. - progr. 
Acrescente a linha 35: 
35 PRINT FNT$&(S) 


Pág. 618 - 3º col. - progr. 

Na linha 3400, 
onde se lê: LPRINT TT$;CHRS$(32); 
leia-se: LPRINT TTS;CHR$(10); 


Pág. 622 - 2º col. - 2º parágr. 
Onde se lê: FIF2 
Leia-se: Fl, F2 


Pág. 626 - 2? col. - 2? e 3º progr. 
Troque de posição estes programas. 


Pág. 681 - 2º col. - progr. 
Acrescente as linhas 1500 e ISTO: 

1500 SCREEN 1 

1510 CLS 


Pág. 692 - 2º col. - 6º parágr. 
Onde se lê; CCTRL-D 
Leia-se: CTRL-D 


Pág. 792 - 2º col. - progr. 
Corrija a linha 10: 
10 org — 12213 


Pág. 793 - 1º col. - progr. 
Corrija a linha IO: 

10 org — 12197 

e suprima a linha 20. 


Pág. 794 - 2º col. - progr. 
Corrija as linhas 20 e 120; 

20 call — 12213 

120 call — 12210 


Pág. 831 - 1º col. - progr. 
Corrija a linha 30: 
30 ld hl, - 15200 


Pág. 916 - 3º col. - 3º parágr. 
Onde se lê: A linha 200 zera € 
Leia-se: A linha 220 zera € 


Pág. 945 - 2? e 3º col. - progr. 
Corrija estas linhas: 

10 org 53693 

80 ld de,222 

600 Id(— 5223),de 

640 ld de,( — 5223) 

670 Id(— 5223),de 


Pág. 946 - 1º col. - 2º parágr. 
Onde se lê: A sub-rotina hs 
Leia-se: A sub-rotina ho 


Pág. 946 - 1º col. - 4º parágr. 
Onde se lê: a sub-rotina snp, 
Leia-se: a sub-rotina sn, 


Pág. 946 - 12, 2? e 3º col. 
Onde se lê: ho 
Leia-se: po 


Pág. 946 - 2º col. - 3º e 5º parágr. 
Onde se lê: hp 
Leia-se: pp 


Pág. 946 - 2º col, - 5º parágr. 
Onde se lê; as instruções pusch 
Leia-se: as instruções push 


Pág. 971 - 1º col. - progr. 
Corrija a linha TO; 

10 org — 11678 

e acrescente as linhas: 

25 Id a,88 

28 ld (— 12162),a 

135 call — 12144 


Pág. 1010 - 3º col. - progr. 
Acrescente a linha I80: 
180 FOR DI=1 TO T:NEXT 


e ordene as linhas 3000 a 3140 e 4000, 


Pág. 1011 - 1º col. - 1º parágr. 
Onde se lê: as variáveis KO a K5 
Leia-se: as variáveis Kl a K5 


Pág. 1034 - 2º col. - progr. 
Corrija a linha 355: 


355 DIM T(17,9) 


Pág. 1040 - 1º col. - progr. 

Corrija a linha !IS0: 
1180 IF M(T(B,8), T(B,9))< >0 THE 
N GH=223+ M(T(B,8), T(B,9)) 


Pág. 1042 - 3º col. - progr. 
Apague a linha 200 e acrescente: 
201 VC=0:DE=0 


Pág. 1131 - 2º col. - progr. 
Corrija a linha 90; 
90 cp O 


Pág. 1186 - 2º col. - progr. 
Corrija a linha 350: 
350 REM ld a,4 


Pág. 1213 - 1º col. - progr. 
Corrija a linha 900: 
900 jp 53850 


Pág. 1232 - 1º col. - progr. 
Corrija a linha 90: 
90 ld a,3 


Pág. 1329 - 1º col. - último progr. 
Substitua o programa por: 

AP CIRCULO :LADO 

DESAPAREÇA TAT 

REPITA 72 [PF :LADO PD 5] 

APAREÇATAT 

FIM 


Pág. 1344 - 2º col. - progr. 
Onde se lê: TO DADOS 
Leia-se: AP DADOS 


Pág. 1366 - 3º col. - último parágr. 

Elimine o trecho final do texto: Vol- 
taremos a este assunto oportunamente, 
quando explicarmos os registros do chip 
de vídeo — VDP. 


+ ERAS 


Pág. 18 - 2? col, - 2º parágr. 
Onde se lê; Modifique a linha 30 
Leia-se: Modifique a linha 120 


Pág. 20 - 1º col. - progr. 

O programa não funciona no Apple 
e no TK-2000 sem sistema operacional 
de disquete. 


Pág. 44 - 3º col. - penúltimo parágr. 
Acrescente: 
No Apple Ile no TK-2000, são mos- 
trados blocos coloridos na tela (coman- 
do VLIN das linhas 85 a 95). 


Pág. 45 - 12 col. - 1º parágr. 
Acrescente: 

As linhas 220, 230 e 240 dos programas 

para outros micros correspondem às li- 

nhas 110, 120 e 130 para o Apple. 











- Pág. 52 - 2º col. - progr. 
Acrescente a linha 1095; 
1095 LET TI=TI+1 


Pág. 52 - 2º col. - 6º parágr. 
Onde se lê: em 999999 segundos 
Leia-se: em 99999 segundos 


Pág. 52 - 3º col. - 1º parágr. 
Onde se tê: dividindo-se FA por 50 
Leia-se: dividindo-se TI por 50 


Pág. 52 - 3º col, - 3º parágr. 

Onde se lê: A linha 1290 aguarda... e a 
linha 1300 verifica 

Leia-se: A linha 1240 aguarda... ea mes- 
ma linha verifica 


Pág. 66 - 2º col. - progr. 
Acrescente a linha 310: 
310 LET T=T+1I:GOTO 130 


Pág. 66 - 3º col. - 2º parágr. 
Onde se lé: tempo gasto na linha 320 
Leia-se: tempo gasto na linha 310 


Pág. 80 - 1º col. - progr. 
Retire a tinha 10, para funcionar no 
Apple Ile no TK-2000. 


Pág. 117 - 2º col. - 2º parágr. 
Onde se lê: As linhas 80 e 90 
Leia-se: As linhas 120 e 130 


Pág. 118 - 1º col, - 1º parágr. 
Substitua o trecho a partir da 8º li- 
nha por: 
tamanho do circulo, entrando diferen- 
tes valores para XC, YCe R. O núme- 
ro máximo para R que você pode colo- 
car irá depender, logicamente, das coor- 
denadas do centro do círculo. Este não 
pode exceder os limites da tela, senão 
ocorrerá um erro no comando HPLOT. 


Pág. 127 - 3º col, - 4º parágr. 
Onde se lê; <CTPL> e <C>. 
Leia-se: <CTRL> e <C&>. 


Pág. 167 - 1? col. - 2º parágr. 
Onde se lê: o comando GETS 
Leia-se: o comando GET 


Pág. 168 - 2º col. - 2º parágr. 
Onde se lê: (chamado de hipe 
Leia-se: (chamado de bipe 


Pág. 220 - 3º col. - 5º parágr. 
Onde se lê: RTS 
Leia-se: RTE 


Pág. 259 - 1º col. - progr. 
Pág. 281 - 2º col. - 2º progr. 
Pág. 283 - 3º col, - 3º progr. 
O programa para o TK-2000 também 
funciona para o Apple. 


Pág. 344 - 1º col. - 2º parágr. 
Onde se lê; linha 140, 
Leia-se: linha 410, 


Pág. 344 - 1º col. - 3º parágr. 
Onde se lê: linha 420 
Leia-se; linha 490 


Pág. 656 - 1º col. - progr. 

Corrija a linha 6210: 
6210 IF A$<40 THEN PRINT “COMO 
SUA VELOCIDADE ERA BAIXA,” 
“PRINT'NADA ACONTECEU": 
GOTO 6500 


Pág. 692 - 2º col. - 6º parágr. 
Onde se lê: CCTRL-D 
Leia-se: CTRL-D 


Pág. 845 - 3º col. - progr. 
Corrija as linhas: 

2060 IF P=1 THEN PRg 1 

2220 NEXT:PRINT 

2230 PRINT & O0:RETURN 


Pág. 932 - quadro - 11º parágr. 
A indicação também é válida para o 
Apple IH. 


Pág. 1034 - 2º col. - progr. 
“Apague a linha 360 e acrescente: 
361 DIM T(16,9) 


AE ARE 


Pág. 88 - 2º col. - 1º parágr. 
Onde se lê: pelo comando MA. 
Leia-se: pelo comando ASS. 


Pág. 116 - 3º col. - progr. 
Para rodar no TK-2000, substitua as 
linhas 50 e 60; 
50 HPLOT 10,75 TO 11,190 
60 HPLOT 10,190 TO 200,190 


Pág. 117 - 2º col. - 2º parágr. 

Onde se lê: As linhas 80 e 90 servem pa- 
ra desenhar a antena. 

Leia-se: As linhas 120 e 130 servem pa- 
ra desenhar a antena. 


Pág. 117 - 3º col. - progr. 

Para rodar no TK-2000, acrescente as 
linhas: 
IS XL=XCIYL=YC+R 
29 XN = XC + R+SIN(N):YN = YC + Rx 
COS(N) 
30 HPLOT XL,YL TO XN,YN:XL= 
ANY =YN 


Pág. 118 - 1º col. - 1º parágr. 
Substitua o trecho a partir da 8º di- 

nha por: 

tamanho do círculo, entrando diferen- 


tes valores para XC, YCe R. O nú- 


7 ] x , : — = i a É + A À 
| ] | 
| À 


mero máximo para R que você pode 
colocar irá depender, logicamente, das 
coordenadas do centro do circulo. Es- 
te não pode exceder os limites da te- 
la, senão ocorrerá um erro no coman- 
do HPLOT. 


Pág. 127 - 2º col. - 3º parágr. 

Onde se lê: Para entender melhor, ex- 
perimente introduzir a linha: 

Leia-se: Para entender melhor, experi- 
mente introduzir a linha (não vale pa- 
ra o TK-2000): 


Pág. 161 - 3º col. - progr. 
Pág. 162 - 3º col. - progr. 
Estes programas também podem ser 


executados no TK-2000. 


Pág. 432 - 3º col. 
Onde se lê: 1160 MP:HGR 
Leia-se: 160 MP:HGR 


Pág. 482 - 2? col. - progr. 

Pág. 483 - 1º col. - progr. 

Pág. 485 - 1º col. - progr. 

Pág. 486 - 2? e 3º col. - progr. 

Pág. 487 - 2º col. - progr. 

Pág. 518 - 1º col. - progr. 

Estes programas não podem ser exe- 

cutados no TK-2000. 


Pág. 656 - 1º col. - progr. 

Corrija a linha 6210; 
6210 IF A$<40 THEN PRINT “COMO 
SUA VELOCIDADE ERA BAIXA,” 
:'PRINT''NADA ACONTECEU": 
GOTO 6500 


Pág. 768 - 2º col. - progr. 
Pág. 769 - 3º col. - progr. 
Pág. 771 - 1º col. - progr. 
Pág. 773 - 1º col. - progr. 
Pág. 782 - 2º col. - progr. 
Pág. 786 - 2º col. - progr. 
Pág. 787 - 2º col. - progr. 
Pág. 858 - 3º col. - progr. 
Pág. 875 - 1º e 2º col. - progr. 


Estes programas não podem ser exe- 
cutados no TK-2000. 


Pág. 932 - quadro - 11º parágr. 
A indicação também é válida para o 
TK-2000. 


Pág. 960 - 1º col. - progr. 
Pág. 974 - 3º col. - progr. 
Pág. 976 - 3º col. - progr. 
Pág. 977 - 2º col. - progr. 
Pág. 979 - 1º e 3º col. - progr. 
Pág. 980 - 2º col, - progr. 


Pág. 1372 - 2º col. - progr. 
Pág. 1374 - 2º col. - progr. 
Pág. 1376 - 1º col. - progr. 


Estes programas não podem ser exe- 
cutados no TK-2000. 


